/********************************************
 * 功能说明: 
 * 模块名称: 
 * 系统名称: intelligent-estate-parent
 * 软件版权: Frank
 * 系统版本: 1.0.0
 * 开发人员: Frank
 * 开发时间: 2019/11/4 10:49
 * 审核人员: 
 * 相关文档: 
 * 修改记录: 修改日期 修改人员 修改说明
 *********************************************/
package com.spring.arch.common.utils;

import com.spring.arch.common.enums.ILabelValuePair;
import com.spring.arch.common.constants.IConstants;
import com.spring.arch.common.enums.ILabelValuePair;
import com.spring.arch.common.exception.AppRuntimeException;
import lombok.extern.slf4j.Slf4j;

import java.io.File;
import java.io.FileFilter;
import java.io.IOException;
import java.lang.reflect.Method;
import java.net.JarURLConnection;
import java.net.URL;
import java.net.URLDecoder;
import java.util.*;
import java.util.jar.JarEntry;
import java.util.jar.JarFile;

/**
 * LabelValuePair 处理工具类
 *
 * @author Frank
 * @version 1.0.0
 * @since 2019/11/4 10:49
 */
@Slf4j
public final class LabelValuePairUtil implements IConstants {

    /**
     * 枚举类对应的全路径集合
     */
    public static final List<String> ENUM_OBJECT_PATH = new ArrayList<>();

    /**
     * 存放单个枚举对象 map常量定义
     */
    private static Map<String, Enum> SINGLE_ENUM_MAP = null;
    /**
     * 存放单个ILabelValuePair接口对象 map常量定义
     */
    private static Map<String, String> SINGLE_LABEL_VALUE_PAIR_MAP = null;

    /**
     * 所有枚举对象的 map
     */
    private static final Map<String, Map<String, Enum>> ENUM_MAP = new HashMap<>();
    /**
     * 所有实现ILabelValuePair接口对象的 map
     */
    private static final Map<String, Map<String, String>> LABEL_VALUE_PAIR_MAP = new HashMap<>();

    static {
        getClassName();
        initialEnumMap();
    }

    /**
     * 加载所有枚举对象数据
     */
    private static void initialEnumMap() {
        try {
            for (String classname : ENUM_OBJECT_PATH) {
                Class<?> cls;
                cls = Class.forName(classname);

                if (cls.isEnum()) {
                    SINGLE_ENUM_MAP = new HashMap<>();
                    initialSingleEnumMap(cls);
                    ENUM_MAP.put(cls.getSimpleName(), SINGLE_ENUM_MAP);
                } else if (cls.isAssignableFrom(ILabelValuePair.class)) {
                    SINGLE_LABEL_VALUE_PAIR_MAP = new HashMap<>();
                    initialLabelValuePairMap(cls);
                    LABEL_VALUE_PAIR_MAP.put(cls.getSimpleName(), SINGLE_LABEL_VALUE_PAIR_MAP);
                }
            }
        } catch (Exception e) {
            log.error(e.getMessage(), e);
        }
    }

    /**
     * 加载每个ILabelValuePair接口对象数据
     */
    private static void initialLabelValuePairMap(Class<?> cls) {

    }

    /**
     * 加载每个枚举对象数据
     */
    private static void initialSingleEnumMap(Class<?> cls) throws Exception {
        Method method = cls.getMethod("values");
        Enum[] arrays = (Enum[]) method.invoke(null);
        for (Enum e : arrays) {
            SINGLE_ENUM_MAP.put(e.name(), e);
        }
    }

    private static void getClassName() {
        Set<Class<?>> classSet = getClasses(PACKAGE_NAME);
        for (Class<?> classitem : classSet) {
            ENUM_OBJECT_PATH.add(classitem.getName());
        }
    }

    /**
     * 获取指定包下所有Class对象
     *
     * @param pack
     * @return
     */
    public static Set<Class<?>> getClasses(String pack) {

        // 第一个class类的集合
        Set<Class<?>> classes = new LinkedHashSet<>();
        // 是否循环迭代
        boolean recursive = true;
        // 获取包的名字 并进行替换
        String packageName = pack;
        String packageDirName = packageName.replace('.', '/');
        // 定义一个枚举的集合 并进行循环来处理这个目录下的things
        Enumeration<URL> dirs;
        try {
            dirs = Thread.currentThread().getContextClassLoader().getResources(packageDirName);
            // 循环迭代下去
            while (dirs.hasMoreElements()) {
                // 获取下一个元素
                URL url = dirs.nextElement();
                // 得到协议的名称
                String protocol = url.getProtocol();
                // 如果是以文件的形式保存在服务器上
                if ("file".equals(protocol)) {
                    // 获取包的物理路径
                    String filePath = URLDecoder.decode(url.getFile(), "UTF-8");
                    // 以文件的方式扫描整个包下的文件 并添加到集合中
                    findAndAddClassesInPackageByFile(packageName, filePath, recursive, classes);
                } else if ("jar".equals(protocol)) {
                    // 如果是jar包文件
                    // 定义一个JarFile
                    JarFile jar;
                    try {
                        // 获取jar
                        jar = ((JarURLConnection) url.openConnection()).getJarFile();
                        // 从此jar包 得到一个枚举类
                        Enumeration<JarEntry> entries = jar.entries();
                        // 同样的进行循环迭代
                        while (entries.hasMoreElements()) {
                            // 获取jar里的一个实体 可以是目录 和一些jar包里的其他文件 如META-INF等文件
                            JarEntry entry = entries.nextElement();
                            String name = entry.getName();
                            // 如果是以/开头的
                            if (name.charAt(0) == '/') {
                                // 获取后面的字符串
                                name = name.substring(1);
                            }
                            // 如果前半部分和定义的包名相同
                            if (name.startsWith(packageDirName)) {
                                int idx = name.lastIndexOf('/');
                                // 如果以"/"结尾 是一个包
                                if (idx != -1) {
                                    // 获取包名 把"/"替换成"."
                                    packageName = name.substring(0, idx).replace('/', '.');
                                }
                                // 如果可以迭代下去 并且是一个包
                                if ((idx != -1) || recursive) {
                                    // 如果是一个.class文件 而且不是目录
                                    if (name.endsWith(".class") && !entry.isDirectory()) {
                                        // 去掉后面的".class" 获取真正的类名
                                        String className = name.substring(packageName.length() + 1, name.length() - 6);
                                        try {
                                            // 添加到classes
                                            classes.add(Class.forName(packageName + '.' + className));
                                        } catch (ClassNotFoundException e) {
                                            log.error(e.getMessage(), e);
                                        }
                                    }
                                }
                            }
                        }
                    } catch (IOException e) {
                        log.error(e.getMessage(), e);
                    }
                }
            }
        } catch (IOException e) {
            log.error(e.getMessage(), e);
        }

        return classes;
    }

    /**
     * 以文件的形式来获取包下的所有Class
     *
     * @param packageName
     * @param packagePath
     * @param recursive
     * @param classes
     */
    public static void findAndAddClassesInPackageByFile(
            String packageName,
            String packagePath,
            final boolean recursive,
            Set<Class<?>> classes) {
        // 获取此包的目录 建立一个File
        File dir = new File(packagePath);
        // 如果不存在或者 也不是目录就直接返回
        if (!dir.exists() || !dir.isDirectory()) {
            return;
        }
        // 如果存在 就获取包下的所有文件 包括目录
        File[] dirfiles = dir.listFiles(new FileFilter() {

            // 自定义过滤规则 如果可以循环(包含子目录) 或则是以.class结尾的文件(编译好的java类文件)
            public boolean accept(File file) {
                return (recursive && file.isDirectory()) || (file.getName().endsWith(".class"));
            }
        });
        // 循环所有文件
        for (File file : dirfiles) {
            // 如果是目录 则继续扫描
            if (file.isDirectory()) {
                findAndAddClassesInPackageByFile(packageName + "." + file.getName(), file.getAbsolutePath(), recursive, classes);
            } else {
                // 如果是java类文件 去掉后面的.class 只留下类名
                String className = file.getName().substring(0, file.getName().length() - 6);
                try {
                    // 添加到集合中去
                    // forName会触发static方法，没有使用classLoader的load干净
                    classes.add(Thread.currentThread().getContextClassLoader().loadClass(packageName + '.' + className));
                } catch (ClassNotFoundException e) {
                    log.error(e.getMessage(), e);
                }
            }
        }
    }

    /**
     * @param clazz
     * @return
     */
    public static Map<String, Enum> getEnumMap(String clazz) {
        return ENUM_MAP.get(clazz);
    }

    /**
     * 获取value返回枚举对象
     *
     * @param value
     * @param clazz
     */
    public static <T extends Enum> T getEnumObject(String value, String clazz) {
        log.debug("枚举 " + clazz + " 值：" + value);
        T retobj = null;
        if (ENUM_MAP.containsKey(clazz)) {
            retobj = (T) ENUM_MAP.get(clazz).get(value);
        }
        if (retobj == null) {
            throw new AppRuntimeException("枚举状态错误：" + clazz + " 值：" + value);
        }
        return retobj;
    }
}
